Adjust exif-tests.el to new interface

diff --git a/test/lisp/image/exif-tests.el b/test/lisp/image/exif-tests.el
index d6b46980d772446214042cef5a732088a0cf02a7..f85d7c018795d094fcc9c7b625581d47d7509b17 100644 (file)
--- a/test/lisp/image/exif-tests.el
+++ b/test/lisp/image/exif-tests.el
@@ -36,7 +36,7 @@
              :value))
 
 (ert-deftest test-exif-parse ()
-  (let ((exif (exif-parse (test-image-file "black.jpg"))))
+  (let ((exif (exif-parse-file (test-image-file "black.jpg"))))
     (should (equal (exif-elem exif 'make) "Panasonic"))
     (should (equal (exif-elem exif 'orientation) 1))
     (should (equal (exif-elem exif 'x-resolution) '(180 . 1)))))